Chip 2007 January, February, March & April/Chip-Cover-CD-2007-02.iso/Pakiet internetowy/Czytniki NEWS/40Tude Dialog 2.0.15.1 beta 38/4d2b38.exe/{app}/dialog.exe/0/RCDATA/TCOMPOSEFORM/TCOMPOSEFORM.txt

Text File | 2005-02-07 | 41.2 KB | 1,533 lines

object ComposeForm: TComposeForm
  Left = 507
  Top = 198
  HelpContext = 1820
  AutoScroll = False
  ClientHeight = 513
  ClientWidth = 605
  Color = clBtnFace
  Constraints.MinHeight = 540
  Constraints.MinWidth = 600
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Default'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  OldCreateOrder = False
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDeactivate = FormDeactivate
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel3: TPanel
    Left = 9
    Top = 24
    Width = 587
    Height = 480
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object PC: TTntPageControl
      Left = 0
      Top = 0
      Width = 587
      Height = 480
      ActivePage = MsgSheet
      Align = alClient
      TabOrder = 0
      OnChange = PCChange
      OnChanging = PCChanging
      object MsgSheet: TTntTabSheet
        Caption = '&Message'
        object Ppanel: TPanel
          Left = 0
          Top = 27
          Width = 579
          Height = 99
          Align = alTop
          BevelOuter = bvNone
          TabOrder = 0
          OnResize = PpanelResize
          object StatusLabel: TTntLabel
            Left = 84
            Top = 78
            Width = 249
            Height = 15
            AutoSize = False
            Color = clBtnFace
            ParentColor = False
            ParentShowHint = False
            ShowHint = True
            WordWrap = True
            OnDblClick = StatusLabelDblClick
          end
          object ToLabel: TTntLabel
            Left = 8
            Top = 30
            Width = 74
            Height = 13
            Caption = '__&Newsgroups:'
            FocusControl = PNewsgroupsEdit
          end
          object Label3: TTntLabel
            Left = 8
            Top = 10
            Width = 51
            Height = 13
            Caption = '__&Subject:'
            FocusControl = PSubjectEdit
          end
          object Label4: TTntLabel
            Left = 8
            Top = 54
            Width = 40
            Height = 13
            Caption = 'Email &to:'
            FocusControl = PEmailToEdit
          end
          object Label5: TTntLabel
            Left = 345
            Top = 14
            Width = 37
            Height = 13
            Caption = '&Identity:'
            FocusControl = PIdentityCB
          end
          object Label6: TTntLabel
            Left = 345
            Top = 34
            Width = 48
            Height = 13
            Caption = 'Si&gnature:'
            FocusControl = PSignatureCB
          end
          object Label8: TTntLabel
            Left = 8
            Top = 78
            Width = 33
            Height = 13
            Caption = 'Stat&us:'
            FocusControl = BodyEditor
          end
          object Label1: TTntLabel
            Left = 345
            Top = 54
            Width = 34
            Height = 13
            Caption = 'Se&rver:'
            FocusControl = PServerCB
          end
          object EmailToEditButton: TTntSpeedButton
            Left = 313
            Top = 50
            Width = 20
            Height = 21
            Hint = 'Addressbook'
            Caption = 'A'
            ParentShowHint = False
            ShowHint = True
            OnClick = PEmailToEditButtonClick
          end
          object PIdentityCB: TTntComboBox
            Left = 428
            Top = 6
            Width = 153
            Height = 21
            AutoComplete = False
            Style = csDropDownList
            ItemHeight = 13
            TabOrder = 3
            OnChange = PIdentityCBChange
            OnExit = PSubjectEditExit
          end
          object PSignatureCB: TTntComboBox
            Left = 428
            Top = 26
            Width = 153
            Height = 21
            AutoComplete = False
            Style = csDropDownList
            ItemHeight = 13
            ParentShowHint = False
            ShowHint = True
            TabOrder = 4
            OnChange = PSignatureCBChange
            OnExit = PSubjectEditExit
            OnKeyDown = PSignatureCBKeyDown
          end
          object PServerCB: TTntComboBox
            Left = 428
            Top = 50
            Width = 153
            Height = 21
            AutoComplete = False
            Style = csDropDownList
            ItemHeight = 13
            ParentShowHint = False
            ShowHint = True
            TabOrder = 5
            OnChange = PServerCBChange
            OnExit = PSubjectEditExit
          end
          object PSubjectEdit: TTntEdit
            Left = 84
            Top = 6
            Width = 249
            Height = 21
            TabOrder = 0
            OnChange = PSubjectEditChange
            OnExit = PSubjectEditExit
          end
          object OtherHeadersCB: TTntComboBox
            Left = 344
            Top = 74
            Width = 77
            Height = 21
            AutoComplete = False
            Style = csDropDownList
            ItemHeight = 13
            TabOrder = 6
            OnChange = OtherHeadersCBChange
            OnExit = PSubjectEditExit
          end
          object OtherHeadersValue: TTntComboBox
            Left = 428
            Top = 74
            Width = 153
            Height = 21
            AutoComplete = False
            Style = csSimple
            ItemHeight = 13
            TabOrder = 7
            OnChange = OtherHeadersValueChange
            OnExit = PSubjectEditExit
          end
          object PNewsgroupsEdit: TTntComboBox
            Left = 84
            Top = 26
            Width = 249
            Height = 21
            AutoComplete = False
            ItemHeight = 13
            TabOrder = 1
            OnChange = PSubjectEditChange
            OnExit = PSubjectEditExit
            OnSelect = PNewsgroupsEditSelect
          end
          object PEmailToEdit: TTntComboBox
            Left = 84
            Top = 50
            Width = 229
            Height = 21
            AutoComplete = False
            ItemHeight = 13
            TabOrder = 2
            OnChange = PSubjectEditChange
            OnExit = PSubjectEditExit
            OnSelect = PEmailToEditSelect
          end
        end
        object BodyEditor: TPlusMemoU
          Left = 0
          Top = 153
          Width = 579
          Height = 299
          Cursor = crIBeam
          Alignment = taLeftJustify
          HideSelection = False
          ScrollBars = ssBoth
          OnChange = BodyEditorChange
          AltFont.Charset = DEFAULT_CHARSET
          AltFont.Color = clWindowText
          AltFont.Height = -11
          AltFont.Name = 'MS Sans Serif'
          AltFont.Style = []
          CaretWidth = 1
          ColumnWrap = 0
          DisplayOnly = False
          EnableHotKeys = False
          EndOfTextMark.Color = clBtnFace
          Justified = False
          LineHeight = 0
          Options = [pmoWrapCaret, pmoInsertKeyActive, pmoWideOverwriteCaret, pmoAutoScrollBars, pmoNoFineScroll, pmoNoDefaultPopup, pmoPlainClipboard]
          Overwrite = False
          RightLinePen.Color = clGray
          RightLinePen.Style = psDot
          ScrollTime = 0
          SelBackColor = clHighlight
          SelTextColor = clHighlightText
          Separators = #9#10#13' $%&,./:;<=>'
          SpecUnderline.Color = clRed
          UpdateMode = umImmediate
          Version = 'v6.3a Professional ed.'
          Align = alClient
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          TabStop = True
          OnDblClick = BodyEditorDblClick
          OnExit = PSubjectEditExit
          OnKeyDown = BodyEditorKeyDown
          OnMouseUp = BodyEditorMouseUp
          OnContextPopup = BodyEditorContextPopup
        end
        object CMessageTabDock: TTBXDock
          Left = 0
          Top = 126
          Width = 579
          Height = 27
          BoundLines = [blTop]
          FixAlign = True
          PopupMenu = ToolbarPopup
          OnInsertRemoveBar = CMessageTabDockInsertRemoveBar
          object Toolbar2: TTBXToolbar
            Left = 0
            Top = 0
            BorderStyle = bsNone
            ChevronMoveItems = False
            DblClickUndock = True
            DefaultDock = CMessageTabDock
            DockPos = 0
            Images = frm40tdMain.BtnIL
            ItemTransparency = itEnable
            ParentShowHint = False
            PopupMenu = ToolbarPopup
            ShowHint = True
            Stretch = True
            TabOrder = 0
            Visible = False
            OnDragDrop = ToolbarDragDrop
            OnDragOver = ToolbarDragOver
          end
        end
        object CMessageTabDock2: TTBXDock
          Left = 0
          Top = 0
          Width = 579
          Height = 27
          BoundLines = [blBottom]
          FixAlign = True
          PopupMenu = ToolbarPopup
          OnInsertRemoveBar = CMessageTabDock2InsertRemoveBar
          object Toolbar: TTBXToolbar
            Left = 0
            Top = 0
            BorderStyle = bsNone
            ChevronMoveItems = False
            DblClickUndock = True
            DefaultDock = CMessageTabDock2
            DockPos = 0
            DockRow = 1
            Images = frm40tdMain.BtnIL
            ItemTransparency = itEnable
            ParentShowHint = False
            PopupMenu = ToolbarPopup
            ShowHint = True
            Stretch = True
            TabOrder = 0
            OnDragDrop = ToolbarDragDrop
            OnDragOver = ToolbarDragOver
          end
        end
      end
      object HeadersSheet: TTntTabSheet
        Caption = 'All &headers'
        ImageIndex = 2
        OnResize = HeadersSheetResize
        object Label15: TTntLabel
          Left = 12
          Top = 109
          Width = 49
          Height = 13
          Caption = '__&Sender:'
          FocusControl = PSenderEdit
        end
        object Label16: TTntLabel
          Left = 12
          Top = 85
          Width = 58
          Height = 13
          Caption = '__&Reply-To:'
          FocusControl = PReplyToEdit
        end
        object Label17: TTntLabel
          Left = 12
          Top = 133
          Width = 74
          Height = 13
          Caption = '__Or&ganization:'
          FocusControl = POrganizationEdit
        end
        object Label18: TTntLabel
          Left = 12
          Top = 276
          Width = 36
          Height = 13
          Caption = '__BCC:'
        end
        object Label19: TTntLabel
          Left = 12
          Top = 252
          Width = 29
          Height = 13
          Caption = '__CC:'
        end
        object Label20: TTntLabel
          Left = 12
          Top = 444
          Width = 53
          Height = 13
          Caption = '&X-Headers:'
          FocusControl = PXHeaderCB
        end
        object Label21: TTntLabel
          Left = 268
          Top = 444
          Width = 3
          Height = 13
          Caption = ':'
        end
        object Label23: TTntLabel
          Left = 12
          Top = 157
          Width = 73
          Height = 13
          Caption = '__&Followup-To:'
          FocusControl = PFollowUpToEdit
        end
        object Label24: TTntLabel
          Left = 12
          Top = 205
          Width = 70
          Height = 13
          Caption = '__Refere&nces:'
          FocusControl = PReferencesEdit
        end
        object Label25: TTntLabel
          Left = 12
          Top = 181
          Width = 85
          Height = 13
          Caption = '__Ma&il-Copies-To:'
          FocusControl = PMailCopiesTo
        end
        object Label26: TTntLabel
          Left = 12
          Top = 229
          Width = 71
          Height = 13
          Caption = '__S&upersedes:'
        end
        object Label12: TTntLabel
          Left = 12
          Top = 13
          Width = 54
          Height = 13
          Caption = '&Your name:'
          FocusControl = PYourNameEdit
        end
        object Label22: TTntLabel
          Left = 12
          Top = 36
          Width = 92
          Height = 13
          Caption = 'Posting email a&ddr.:'
          FocusControl = PPostingemailedit
        end
        object Label64: TTntLabel
          Left = 12
          Top = 60
          Width = 82
          Height = 13
          Caption = '&Email email addr.:'
          FocusControl = PEmailemailedit
        end
        object CCButton: TTntSpeedButton
          Left = 513
          Top = 246
          Width = 20
          Height = 21
          Hint = 'Addressbook'
          Caption = 'A'
          ParentShowHint = False
          ShowHint = True
          OnClick = PEmailToEditButtonClick
        end
        object BCCButton: TTntSpeedButton
          Left = 513
          Top = 270
          Width = 20
          Height = 21
          Hint = 'Addressbook'
          Caption = 'A'
          ParentShowHint = False
          ShowHint = True
          OnClick = PEmailToEditButtonClick
        end
        object Label27: TTntLabel
          Left = 12
          Top = 301
          Width = 51
          Height = 13
          Caption = '__Archi&ve:'
          FocusControl = PArchiveEdit
        end
        object Label28: TTntLabel
          Left = 12
          Top = 325
          Width = 61
          Height = 13
          Caption = '__Keywords:'
          FocusControl = PKeywordsEdit
        end
        object Label29: TTntLabel
          Left = 12
          Top = 349
          Width = 58
          Height = 13
          Caption = '__Summary:'
          FocusControl = PSummaryEdit
        end
        object Label30: TTntLabel
          Left = 12
          Top = 373
          Width = 49
          Height = 13
          Caption = '__Expires:'
        end
        object Label31: TTntLabel
          Left = 12
          Top = 397
          Width = 61
          Height = 13
          Caption = '__Approved:'
          FocusControl = PApprovedEdit
        end
        object ApprovedButton: TTntSpeedButton
          Left = 513
          Top = 390
          Width = 20
          Height = 21
          Hint = 'Addressbook'
          Caption = 'A'
          ParentShowHint = False
          ShowHint = True
          OnClick = PEmailToEditButtonClick
        end
        object ExpireButton: TTntSpeedButton
          Left = 513
          Top = 366
          Width = 20
          Height = 21
          Hint = 'Select date/time'
          Caption = 'D'
          ParentShowHint = False
          ShowHint = True
          OnClick = ExpireButtonClick
        end
        object TntLabel1: TTntLabel
          Left = 12
          Top = 421
          Width = 67
          Height = 13
          Caption = '__Distribution:'
          FocusControl = PDistributionEdit
        end
        object PSenderEdit: TTntEdit
          Left = 128
          Top = 102
          Width = 405
          Height = 21
          TabOrder = 4
          OnExit = PSubjectEditExit
        end
        object PReplyToEdit: TTntEdit
          Left = 128
          Top = 78
          Width = 405
          Height = 21
          TabOrder = 3
          OnExit = PSubjectEditExit
        end
        object POrganizationEdit: TTntEdit
          Left = 128
          Top = 126
          Width = 405
          Height = 21
          TabOrder = 5
          OnExit = PSubjectEditExit
        end
        object PXHeaderCB: TTntComboBox
          Left = 128
          Top = 438
          Width = 137
          Height = 21
          AutoComplete = False
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 18
          OnChange = PXHeaderCBChange
          OnExit = PSubjectEditExit
        end
        object PXHeaderContent: TTntEdit
          Left = 276
          Top = 438
          Width = 257
          Height = 21
          TabOrder = 19
          OnChange = PXHeaderContentChange
          OnExit = PSubjectEditExit
        end
        object PFollowUpToEdit: TTntComboBox
          Left = 128
          Top = 150
          Width = 405
          Height = 21
          AutoComplete = False
          ItemHeight = 13
          TabOrder = 6
          OnExit = PSubjectEditExit
        end
        object PMailCopiesTo: TTntComboBox
          Left = 128
          Top = 174
          Width = 405
          Height = 21
          AutoComplete = False
          ItemHeight = 13
          TabOrder = 7
          OnExit = PSubjectEditExit
        end
        object PPostingemailedit: TTntEdit
          Left = 128
          Top = 30
          Width = 405
          Height = 21
          TabOrder = 1
          OnExit = PSubjectEditExit
        end
        object PEmailemailedit: TTntEdit
          Left = 128
          Top = 54
          Width = 405
          Height = 21
          TabOrder = 2
          OnExit = PSubjectEditExit
        end
        object PYourNameEdit: TTntEdit
          Left = 128
          Top = 4
          Width = 405
          Height = 23
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Arial Unicode MS'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          OnExit = PSubjectEditExit
        end
        object PReferencesEdit: TJvButtonBoxU
          Left = 128
          Top = 198
          Width = 405
          Height = 21
          OnExit = PSubjectEditExit
          TabOrder = 8
          Edit.Font.Charset = DEFAULT_CHARSET
          Edit.Font.Color = clWindowText
          Edit.Font.Height = -11
          Edit.Font.Name = 'MS Sans Serif'
          Edit.Font.Style = []
          Button.Font.Charset = DEFAULT_CHARSET
          Button.Font.Color = clWindowText
          Button.Font.Height = -11
          Button.Font.Name = 'MS Sans Serif'
          Button.Font.Style = []
          Button.Caption = 'Clear'
          Button.Width = 65
          OnButtonClick = PReferencesEditButtonClick
        end
        object PSupersedesEdit: TJvButtonBoxU
          Left = 128
          Top = 222
          Width = 405
          Height = 21
          OnExit = PSubjectEditExit
          TabOrder = 9
          TabStop = True
          Edit.ReadOnly = True
          Edit.Font.Charset = DEFAULT_CHARSET
          Edit.Font.Color = clWindowText
          Edit.Font.Height = -11
          Edit.Font.Name = 'MS Sans Serif'
          Edit.Font.Style = []
          Edit.Color = clBtnFace
          Button.Font.Charset = DEFAULT_CHARSET
          Button.Font.Color = clWindowText
          Button.Font.Height = -11
          Button.Font.Name = 'MS Sans Serif'
          Button.Font.Style = []
          Button.Caption = 'Clear'
          Button.Width = 65
          OnButtonClick = PSupersedesEditButtonClick
        end
        object PCCEdit: TTntComboBox
          Left = 128
          Top = 246
          Width = 383
          Height = 21
          AutoComplete = False
          BevelInner = bvNone
          BevelOuter = bvNone
          ItemHeight = 13
          TabOrder = 10
          OnExit = PSubjectEditExit
        end
        object PBCCEdit: TTntComboBox
          Left = 128
          Top = 270
          Width = 383
          Height = 21
          AutoComplete = False
          BevelInner = bvNone
          BevelOuter = bvNone
          Ctl3D = False
          ItemHeight = 13
          ParentCtl3D = False
          TabOrder = 11
          OnExit = PSubjectEditExit
        end
        object PArchiveEdit: TTntComboBox
          Left = 128
          Top = 294
          Width = 405
          Height = 21
          AutoComplete = False
          ItemHeight = 13
          TabOrder = 12
          OnExit = PSubjectEditExit
        end
        object PKeywordsEdit: TTntEdit
          Left = 128
          Top = 318
          Width = 405
          Height = 21
          TabOrder = 13
          OnExit = PSubjectEditExit
        end
        object PSummaryEdit: TTntEdit
          Left = 128
          Top = 342
          Width = 405
          Height = 21
          TabOrder = 14
          OnExit = PSubjectEditExit
        end
        object PApprovedEdit: TTntEdit
          Left = 128
          Top = 390
          Width = 381
          Height = 21
          TabOrder = 16
          OnExit = PSubjectEditExit
        end
        object PExpiresEdit: TTntEdit
          Left = 128
          Top = 366
          Width = 381
          Height = 21
          TabOrder = 15
          OnExit = PSubjectEditExit
        end
        object PDistributionEdit: TTntEdit
          Left = 128
          Top = 414
          Width = 405
          Height = 21
          TabOrder = 17
          OnExit = PSubjectEditExit
        end
      end
      object Attachmentsheet: TTntTabSheet
        Caption = '&Attachments'
        ImageIndex = 1
        object AttachmentWarnLabel: TTntLabel
          Left = 0
          Top = 0
          Width = 579
          Height = 17
          Align = alTop
          AutoSize = False
        end
        object AttachmentLV: TTntListView
          Left = 0
          Top = 17
          Width = 579
          Height = 229
          Align = alClient
          Columns = <
            item
              Caption = 'File name and location'
              Width = 250
            end
            item
              Caption = 'File type'
            end
            item
              Caption = 'Encoding'
              Width = 90
            end
            item
              Caption = 'Description'
              Width = 70
            end
            item
              Caption = 'Zip'
            end
            item
              Caption = 'Size'
              Width = 70
            end>
          HideSelection = False
          ReadOnly = True
          TabOrder = 0
          ViewStyle = vsReport
          OnCustomDrawItem = AttachmentLVCustomDrawItem
          OnCustomDrawSubItem = AttachmentLVCustomDrawSubItem
          OnSelectItem = AttachmentLVSelectItem
        end
        object Panel2: TPanel
          Left = 0
          Top = 246
          Width = 579
          Height = 206
          Align = alBottom
          BevelOuter = bvNone
          TabOrder = 1
          object Beveles12: TBevelesU
            Left = 4
            Top = 8
            Width = 449
            Height = 55
            Shape = bsFrame
            Caption = 'Settings for selected attachment'
            BorderWidth = 0
          end
          object Label2: TTntLabel
            Left = 16
            Top = 32
            Width = 48
            Height = 13
            Caption = 'E&ncoding:'
            FocusControl = AttachEncCB
          end
          object Beveles1: TBevelesU
            Left = 4
            Top = 104
            Width = 449
            Height = 97
            Shape = bsFrame
            Caption = 'Settings for all attachments'
            BorderWidth = 0
          end
          object Label10: TTntLabel
            Left = 32
            Top = 152
            Width = 63
            Height = 13
            Caption = 'Zi&p file name:'
            FocusControl = AttachAllZipFilenameEdit
          end
          object AttachEncCB: TTntComboBox
            Left = 100
            Top = 28
            Width = 109
            Height = 21
            Style = csDropDownList
            Color = clBtnFace
            Enabled = False
            ItemHeight = 13
            TabOrder = 0
            OnChange = AttachEncCBChange
          end
          object AttachZipCB: TtntAutoSizeCheckBox
            Left = 224
            Top = 42
            Width = 102
            Height = 17
            Caption = '&Zip compress file'
            Enabled = False
            TabOrder = 1
            OnClick = AttachZipCBClick
          end
          object AttachAllZipCB: TtntAutoSizeCheckBox
            Left = 12
            Top = 124
            Width = 205
            Height = 17
            Caption = 'Zip &compress all files into one and use '
            TabOrder = 2
            OnClick = AttachAllZipCBClick
          end
          object AttachAllEncodingCB: TTntComboBox
            Left = 240
            Top = 120
            Width = 169
            Height = 21
            AutoComplete = False
            Style = csDropDownList
            Enabled = False
            ItemHeight = 13
            TabOrder = 3
            OnChange = AttachAllEncodingCBChange
          end
          object AttachAllZipFilenameEdit: TTntEdit
            Left = 132
            Top = 148
            Width = 277
            Height = 21
            Enabled = False
            TabOrder = 4
            OnChange = AttachAllZipFilenameEditChange
          end
          object AddAttachmentBtn: TMMTNTBItBtn
            Left = 8
            Top = 69
            Width = 141
            Height = 25
            Caption = 'Add a&ttachment(s)...'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBtnText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 5
            OnClick = AddAttachmentBtnClick
          end
          object DeleteSelAttachmentBtn: TMMTNTBItBtn
            Left = 160
            Top = 69
            Width = 141
            Height = 25
            Caption = 'Delete &selected'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBtnText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 6
            OnClick = DeleteSelAttachmentBtnClick
          end
          object DeleteAllAttachmentsBtn: TMMTNTBItBtn
            Left = 308
            Top = 69
            Width = 141
            Height = 25
            Caption = 'D&elete all'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBtnText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 7
            OnClick = DeleteAllAttachmentsBtnClick
          end
          object AttachAddFNToSubjectCB: TtntAutoSizeCheckBox
            Left = 224
            Top = 24
            Width = 161
            Height = 17
            Caption = 'Add &file description to subject'
            Enabled = False
            TabOrder = 8
            OnClick = AttachAddFNToSubjectCBClick
          end
          object AttachAddFNToSubjectALLCB: TtntAutoSizeCheckBox
            Left = 30
            Top = 176
            Width = 161
            Height = 17
            Caption = 'Add file description to sub&ject'
            Enabled = False
            TabOrder = 9
            OnClick = AttachAddFNToSubjectALLCBClick
          end
        end
      end
      object OptTab: TTntTabSheet
        Caption = '&Options'
        ImageIndex = 3
        object Label7: TTntLabel
          Left = 188
          Top = 12
          Width = 50
          Height = 13
          Caption = 'characters'
        end
        object Label13: TTntLabel
          Left = 8
          Top = 112
          Width = 24
          Height = 13
          Caption = '&Font:'
          FocusControl = FontNamesCB
        end
        object Button1: TMMTNTBItBtn
          Left = 8
          Top = 36
          Width = 377
          Height = 25
          Caption = '&Save current size and position as default for new drafts'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBtnText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          OnClick = Button1Click
        end
        object Button2: TMMTNTBItBtn
          Left = 8
          Top = 68
          Width = 377
          Height = 25
          Caption = 'Sa&ve current spell check options as default for new drafts'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBtnText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnClick = Savesettingsasdefaultfornewdrafts1Click
        end
        object Wordwrapcb: TtntAutoSizeCheckBox
          Left = 8
          Top = 12
          Width = 97
          Height = 17
          Caption = 'Wrap lines &after'
          TabOrder = 3
          OnClick = WordwrapcbClick
        end
        object FontNamesCB: TSMFontNamesCombo
          Left = 40
          Top = 104
          Width = 177
          Height = 20
          FontSizesCombo = FontSizesCB
          TabOrder = 4
          OnChange = FontNamesCBChange
        end
        object FontSizesCB: TSMFontSizesCombo
          Left = 224
          Top = 104
          Width = 57
          Height = 21
          ItemHeight = 0
          Style = csDropDownList
          TabOrder = 5
          OnChange = FontNamesCBChange
        end
        object WrapAfter: tMMjvspinedit
          Left = 140
          Top = 8
          Width = 45
          Height = 21
          MaxValue = 76.000000000000000000
          MinValue = 10.000000000000000000
          Value = 76.000000000000000000
          TabOrder = 2
          OnChange = WrapAfterChange
        end
      end
      object ErrorWarningSheet: TTntTabSheet
        Caption = 'Errors/&Warnings'
        ImageIndex = 4
        OnResize = ErrorWarningSheetResize
        object Label14: TTntLabel
          Left = 0
          Top = 439
          Width = 579
          Height = 13
          Align = alBottom
          Caption = 'Double-click on an entry to jump to the corresponding input box.'
        end
        object ErrorsLV: TTntListView
          Left = 0
          Top = 57
          Width = 579
          Height = 382
          Align = alClient
          Columns = <
            item
              AutoSize = True
            end>
          LargeImages = frm40tdMain.ImageList1
          ReadOnly = True
          RowSelect = True
          ShowColumnHeaders = False
          SmallImages = frm40tdMain.ImageList1
          TabOrder = 0
          ViewStyle = vsReport
          OnDblClick = ErrorsLVDblClick
        end
        object Panel1: TPanel
          Left = 0
          Top = 0
          Width = 579
          Height = 57
          Align = alTop
          BevelOuter = bvNone
          TabOrder = 1
          DesignSize = (
            579
            57)
          object StatusLabel2: TTntLabel
            Left = 96
            Top = 6
            Width = 465
            Height = 15
            AutoSize = False
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            ParentShowHint = False
            ShowHint = True
            WordWrap = True
          end
          object Label11: TTntLabel
            Left = 8
            Top = 6
            Width = 77
            Height = 13
            Caption = 'Message status:'
            FocusControl = OtherHeadersCB
          end
          object Label9: TTntLabel
            Left = 8
            Top = 40
            Width = 118
            Height = 13
            Caption = 'Errors, warnings, notices:'
            FocusControl = ErrorsLV
          end
          object Bevel1: TBevel
            Left = 8
            Top = 24
            Width = 577
            Height = 2
          end
          object CheckMsgBtn: TMMTNTBItBtn
            Left = 455
            Top = 30
            Width = 118
            Height = 25
            Anchors = [akTop, akRight]
            Caption = 'Check me&ssage'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBtnText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 0
            OnClick = CheckMsgBtnClick
          end
        end
      end
    end
  end
  object CTopDock: TTBXDock
    Left = 0
    Top = 0
    Width = 605
    Height = 24
    BackgroundOnToolbars = False
    BoundLines = [blBottom]
    PopupMenu = ToolbarPopup
    object CMenuToolbar: TTBXToolbar
      Left = 0
      Top = 0
      BorderStyle = bsNone
      Caption = 'CMenuToolbar'
      ChevronMoveItems = False
      CloseButton = False
      DblClickUndock = True
      DefaultDock = CTopDock
      DockableTo = [dpTop]
      DockMode = dmCannotFloatOrChangeDocks
      DockPos = 0
      FullSize = True
      Images = frm40tdMain.BtnIL
      MenuBar = True
      ProcessShortCuts = True
      ShrinkMode = tbsmWrap
      Stretch = True
      TabOrder = 0
      object Action1: TTBXSubmenuItem
        Caption = 'A&ction'
        object Sendnow1: TTBXItem
          Action = frm40tdMain.CSendNow
        end
        object Sendlater1: TTBXItem
          Action = frm40tdMain.CSentLater
        end
        object TBXItem7: TTBXItem
          Action = frm40tdMain.CSaveDraft
        end
        object Deletedraft1: TTBXItem
          Action = frm40tdMain.CDeleteDraft
        end
      end
      object Edit2: TTBXSubmenuItem
        Caption = '&Edit'
        object Undo1: TTBXItem
          Action = frm40tdMain.CUndo
        end
        object Redo1: TTBXItem
          Action = frm40tdMain.CRedo
        end
        object TBXSeparatorItem9: TTBXSeparatorItem
        end
        object TBXItem9: TTBXItem
          Action = frm40tdMain.CFind
        end
        object TBXItem6: TTBXItem
          Action = frm40tdMain.CFindNext
        end
        object N8: TTBXSeparatorItem
        end
        object Cut2: TTBXItem
          Action = frm40tdMain.CCut
        end
        object Copy1: TTBXItem
          Action = frm40tdMain.CCopy
        end
        object Paste2: TTBXItem
          Action = frm40tdMain.CPaste
        end
        object Pasteasquote2: TTBXItem
          Action = frm40tdMain.CPasteAsQuote
        end
        object Pasteascustomquote1: TTBXItem
          Action = frm40tdMain.CPasteAsCustomQuote
        end
        object Pasteheaderfield1: TTBXItem
          Action = frm40tdMain.CPasteHeaderField
        end
        object Delete1: TTBXItem
          Action = frm40tdMain.CDelete
        end
      end
      object Special1: TTBXSubmenuItem
        Caption = 'Specia&l'
        object ScrambleRot131: TTBXItem
          Action = frm40tdMain.CUnscramble
        end
        object Reformatparapraph1: TTBXItem
          Action = frm40tdMain.CReformatParagraphAction
        end
        object TBXSeparatorItem5: TTBXSeparatorItem
        end
        object InsertWrapoverridecharacter1: TTBXItem
          Action = frm40tdMain.CInsertWrapOverrideCharacter
        end
        object Insertspoilercharacter2: TTBXItem
          Action = frm40tdMain.CInsertSpoilerCharacter
        end
        object TBXSeparatorItem4: TTBXSeparatorItem
        end
        object Expandglossary2: TTBXItem
          Action = frm40tdMain.CExpandGlossary
        end
        object TBXSeparatorItem7: TTBXSeparatorItem
        end
        object TBXItem8: TTBXItem
          Action = frm40tdMain.CLocateOriginal
        end
      end
      object Options1: TTBXSubmenuItem
        Caption = 'O&ptions'
        OnClick = Options1Click
        object Wordwrap1: TTBXItem
          Action = frm40tdMain.CWordWrap
        end
        object N9: TTBXSeparatorItem
        end
        object Savecurrentwindowsizeandposasdefault1: TTBXItem
          Caption = 'Save current window size and pos. as default'
          OnClick = Button1Click
        end
        object Savecurrentspellcheckoptionsasdefault1: TTBXItem
          Caption = 'Save current spell check options as default'
          OnClick = Savesettingsasdefaultfornewdrafts1Click
        end
        object N11: TTBXSeparatorItem
        end
        object Configurebuttonsshortcuts1: TTBXItem
          Caption = 'Configure buttons/shortcuts...'
          Hint = 'Configure buttons'
          ImageIndex = 100
          OnClick = ConfigBtnsMIClick
        end
      end
      object PGP2: TTBXSubmenuItem
        Caption = '&PGP'
        Visible = False
        object PGPencrypt1: TTBXItem
          Caption = 'PGP encrypt'
          Enabled = False
          Hint = 'PGP encrypt'
          ImageIndex = 147
          Visible = False
        end
        object PGPsign1: TTBXItem
          Caption = 'PGP sign'
          Enabled = False
          Hint = 'PGP sign'
          ImageIndex = 146
          Visible = False
        end
        object PGPencryptandsign1: TTBXItem
          Caption = 'PGP encrypt and sign'
          Enabled = False
          Hint = 'PGP encrypt and sign'
          ImageIndex = 148
          Visible = False
        end
      end
      object Spellcheckoptions1: TTBXSubmenuItem
        Caption = 'Spell chec&k'
        OnClick = Spellcheckoptions1Click
        object Spellcheck1: TTBXItem
          Action = frm40tdMain.CSpellCheckOnTheFly
        end
        object TBXItem5: TTBXItem
          Action = frm40tdMain.CSpellCheckDialog
        end
        object N12: TTBXSeparatorItem
        end
        object Settings1: TTBXItem
          Caption = 'Settings...'
          OnClick = Adddictionary1Click
        end
        object Savesettingsasdefaultfornewdrafts2: TTBXItem
          Caption = 'Save settings as default for new drafts'
          OnClick = Savesettingsasdefaultfornewdrafts1Click
        end
        object TBXSeparatorItem6: TTBXSeparatorItem
        end
      end
    end
  end
  object CLeftDock: TTBXDock
    Left = 0
    Top = 24
    Width = 9
    Height = 480
    PopupMenu = ToolbarPopup
    Position = dpLeft
  end
  object CRightDock: TTBXDock
    Left = 596
    Top = 24
    Width = 9
    Height = 480
    PopupMenu = ToolbarPopup
    Position = dpRight
  end
  object CBottomDock: TTBXDock
    Left = 0
    Top = 504
    Width = 605
    Height = 9
    PopupMenu = ToolbarPopup
    Position = dpBottom
  end
  object PopupMenu1: TTBXPopupMenu
    Images = frm40tdMain.BtnIL
    Left = 448
    Top = 208
    object CutMI: TTBXItem
      Action = frm40tdMain.CCut
    end
    object copyMI: TTBXItem
      Action = frm40tdMain.CCopy
    end
    object pasteMI: TTBXItem
      Action = frm40tdMain.CPaste
      Options = [tboShowHint]
    end
    object pastasquote: TTBXItem
      Tag = 1
      Action = frm40tdMain.CPasteAsQuote
    end
    object Pasteasquote1: TTBXItem
      Tag = 2
      Action = frm40tdMain.CPasteAsCustomQuote
    end
    object PasteheaderfieldMI: TTBXItem
      Action = frm40tdMain.CPasteHeaderField
    end
    object deleteMI: TTBXItem
      Action = frm40tdMain.CDelete
    end
    object TBXSeparatorItem1: TTBXSeparatorItem
    end
    object TBXItem1: TTBXItem
      Action = frm40tdMain.CUndo
    end
    object TBXItem2: TTBXItem
      Action = frm40tdMain.CRedo
    end
    object N6: TTBXSeparatorItem
    end
    object WordWrap: TTBXItem
      Action = frm40tdMain.CWordWrap
    end
    object PGP1: TTBXSubmenuItem
      Caption = 'PGP'
      Visible = False
      object N7: TTBXItem
        Caption = 'PGP sign'
        Enabled = False
        Hint = 'PGP sign'
        ImageIndex = 146
        Visible = False
      end
      object N5: TTBXItem
        Caption = 'PGP encrypt'
        Enabled = False
        Hint = 'PGP encrypt'
        ImageIndex = 147
        Visible = False
      end
      object N4: TTBXItem
        Tag = 1
        Caption = 'PGP encrypt and sign'
        Enabled = False
        Hint = 'PGP encrypt and sign'
        ImageIndex = 148
        Visible = False
      end
    end
    object N1: TTBXSeparatorItem
    end
    object Reformatparagraph1: TTBXItem
      Action = frm40tdMain.CReformatParagraphAction
    end
    object rot13: TTBXItem
      Action = frm40tdMain.CUnscramble
    end
    object TBXSeparatorItem3: TTBXSeparatorItem
    end
    object TBXItem3: TTBXItem
      Action = frm40tdMain.CInsertWrapOverrideCharacter
    end
    object Insertspoilercharacter1: TTBXItem
      Action = frm40tdMain.CInsertSpoilerCharacter
    end
    object TBXSeparatorItem2: TTBXSeparatorItem
    end
    object Expandglossary1: TTBXItem
      Action = frm40tdMain.CExpandGlossary
    end
    object Cut1: TTBXItem
      Caption = 'Cut'
      Hint = 'Cut|Cut selected text'
      ImageIndex = 3
      ShortCut = 16429
      Visible = False
      OnClick = Cut1Click
    end
    object Paste1: TTBXItem
      Caption = 'Paste'
      Hint = 'Paste|Paste text in clipboard'
      ImageIndex = 1
      ShortCut = 8237
      Visible = False
      OnClick = Paste1Click
    end
    object Delete6: TTBXItem
      Caption = 'Delete'
      Hint = 'Delete|Delete selected text'
      ImageIndex = 4
      ShortCut = 8238
      Visible = False
      OnClick = Delete6Click
    end
  end
  object NoAction: TAction
    Category = 'File'
    Caption = 'Separator space'
    ImageIndex = 190
  end
  object ToolbarPopup: TTBXPopupMenu
    Images = frm40tdMain.BtnIL
    OnPopup = ToolbarPopupPopup
    Left = 480
    Top = 208
    object TBXItem4: TTBXItem
      Caption = 'Configure buttons/shortcuts...'
      Hint = 'Configure buttons'
      ImageIndex = 100
      OnClick = ConfigBtnsMIClick
    end
    object TBXSeparatorItem8: TTBXSeparatorItem
    end
    object Toolbar1MI: TTBXItem
      AutoCheck = True
      Caption = 'Toolbar &1'
      OnClick = Toolbar1MIClick
    end
    object Toolbar2MI: TTBXItem
      AutoCheck = True
      Caption = 'Toolbar &2'
      OnClick = Toolbar1MIClick
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 10
    OnTimer = Timer1Timer
    Left = 160
    Top = 264
  end
  object Timer2: TTimer
    Enabled = False
    OnTimer = Timer2Timer
    Left = 192
    Top = 264
  end
  object Timer3: TTimer
    Enabled = False
    Interval = 200
    OnTimer = Timer3Timer
    Left = 221
    Top = 264
  end
end